0 PRINT"[147]":POKE828,0:GOSUB480
1 TI$="000000"
5 REM GENERAL SETUP AND LOADING
10 POKE55,0:POKE56,128:CLR:REM LOWERS TOP OF BASIC
20 MU=0:REM MUSIC FLAG
25 FORI=0TO24:POKEI+54272,0:NEXT:REM CLEAR SID CHIP
30 SYS57812"SID PLAYER",8,0:POKE780,0:POKE781,0:POKE782,192:SYS65493
35 Q9$="CHANUKAH.MUS"
40 SYS57812Q9$,8,0:POKE780,0:POKE781,0:POKE782,128:SYS65493
45 GOSUB180:GOSUB120
50 GOTO200
120 REM :: START/RESTART MUSIC ::
125 IFMUTHENGOSUB140
130 SYS49435:POKE781,0:POKE782,128:SYS49458:POKE49152,7:MU=1:RETURN
135 :
140 REM :: STOP MUSIC ::
145 POKE49152,0:POKE54276,0:POKE54283,0:POKE54290,0:SYS49629:MU=0:RETURN
150 :
155 REM :: RESUME MUSIC ::
160 IFPEEK(49152)=7THENRETURN
165 SYS49435:POKE49152,7:MU=1:RETURN
170 :
175 REM :: CHECK MUSIC ::
180 IFPEEK(49152)=7THENRETURN
185 IFMUTHENGOSUB140:GOSUB120
190 RETURN
200 IF ML=1 THEN225 
205 GOSUB480:PRINT"[147]"
210 POKE56,56:POKE55,0
212 D=PEEK(186)
213 GOSUB 140
219 GOSUB155
220 REM REST OF PROGRAM
225 POKE53280,00:POKE53281,00:PRINT"[147]"CHR$(142);
226 PRINT"[158]TO LIGHT THE CANDLES, PRESS THE NUMBERS"
227 PRINT"  1 THROUGH 8 IN THE APPROPRIATE ORDER"
230 PRINT"":WK$="[151][213]"
235 PRINTSPC(20);WK$
240 PRINTSPC(17);WK$;"   [146]  ";WK$
245 PRINTSPC(14);WK$;"   [146]   [146]   [146]  ";WK$
250 PRINTSPC(11);WK$;"   [146]   [146]   [146]   [146]   [146]  ";WK$
255 PRINTSPC(8);WK$;"   [146]   [146]   [146]   [146]   [146]   [146]   [146]  ";WK$
260 PRINTSPC(8)" [146]   [146]   [146]   [146]   [146]   [146]   [146]   [146]   [146]"
265 PRINTSPC(8)" [146]   [146]   [146]   [146]   [146]   [146]   [146]   [146]   [146]"
270 PRINTSPC(8)" [146]   [146]   [146]   [146]   [146]   [146]   [146]   [146]   [146]"
275 PRINTSPC(8)" [146]   [146]   [146]   [146] [158][202][178][203]  [146]   [146]   [146]   [146]"
280 PRINTSPC(8)" [146]   [146]   [146] [158][202][178][203] [221] [202][178][203]  [146]   [146]   [146]"
285 PRINTSPC(8)" [146]   [146] [158][202][178][203] [202][192][192][219][192][192][203] [202][178][203]  [146]   [146]"
290 PRINTSPC(8)" [146] [158][202][178][203] [202][192][192][192][192][192][219][192][192][192][192][192][203] [202][178][203]  [146]"
295 PRINTSPC(7)"[158][202][178][203] [202][192][192][192][192][192][192][192][192][219][192][192][192][192][192][192][192][192][203] [202][178][203]"
300 PRINTSPC(8)"[158][202][192][192][192][192][192][192][192][192][192][192][192][219][192][192][192][192][192][192][192][192][192][192][192][203]"
305 PRINTSPC(19)"[169][183][223][146]"
310 PRINTSPC(17)"[169][183][183][183][183][183][223][146]"
315 PRINTSPC(15)"[169][183][183][183][183][183][183][183][183][183][223][146]"
320 PRINTSPC(13)"[169][183][183][183][183][183][183][183][183][183][183][183][183][183][223][146]"
325 PRINTSPC(13)"HAPPY CHANUKAH![146]"
330 GETX$:IFX$=""THEN330
335 X=VAL(X$):IFX$="Q"THEN40000
336 IFX<0ORX>8THEN330
340 Y=X:ONX+1GOTO475,345,360,375,390,415,430,445,460
345 POKEV+21,2
350 FORDELAY=0TO500:NEXT
355 GOTO405
360 POKEV+21,4
362 FORDELAY=0TO500:NEXT:POKE V+21,6
365 FORDELAY=0TO500:NEXT
370 GOTO405
375 POKEV+21,8
376 FORDELAY=0TO500:NEXT:POKE V+21,12
377 FORDELAY=0TO500:NEXT:POKE V+21,14
380 FORDELAY=0TO500:NEXT
385 GOTO405
390 POKEV+21,16
391 FORDELAY=0TO500:NEXT:POKE V+21,24
392 FORDELAY=0TO500:NEXT:POKE V+21,28
393 FORDELAY=0TO500:NEXT:POKE V+21,30
395 FORDELAY=0TO500:NEXT
400 GOTO405
405 POKEV+21,(PEEK(V+21))+1
406 IF Y=8THENGOSUB1100:GOTO406
410 GOSUB1100:POKEV+21,0:GOTO330
415 POKEV+21,32
416 FORDELAY=0TO500:NEXT:POKE V+21,48
417 FORDELAY=0TO500:NEXT:POKE V+21,56
418 FORDELAY=0TO500:NEXT:POKE V+21,60:FOR DELAY=0TO500:NEXT:POKEV+21,62
420 FORDELAY=0TO500:NEXT
425 GOTO405
430 POKEV+21,64
431 FORDELAY=0TO500:NEXT:POKE V+21,96
432 FORDELAY=0TO500:NEXT:POKE V+21,112
433 FORDELAY=0TO500:NEXT:POKE V+21,120:FOR DELAY=0TO500:NEXT:POKEV+21,124
434 FORDELAY=0TO500:NEXT:POKE V+21,126
435 FORDELAY=0TO500:NEXT
440 GOTO405
445 POKEV+21,128
446 FORDELAY=0TO500:NEXT:POKE V+21,192
447 FORDELAY=0TO500:NEXT:POKE V+21,224:FOR DELAY=0TO500:NEXT:POKEV+21,224
448 FORDELAY=0TO500:NEXT:POKE V+21,248:FOR DELAY=0TO500:NEXT:POKEV+21,254
450 FORDELAY=0TO500:NEXT:IFY>7THEN460
455 GOTO405
460 POKEV,80:POKEV+1,101:POKE21,1
461 FORDELAY=0TO500:NEXT:POKE V+21,129:FOR DELAY=0TO500:NEXT:POKEV+21,193
462 FORDELAY=0TO500:NEXT:POKE V+21,225:FOR DELAY=0TO500:NEXT:POKEV+21,241
463 FORDELAY=0TO500:NEXT:POKE V+21,249:FOR DELAY=0TO500:NEXT:POKEV+21,255
465 FORDELAY=0TO500:NEXT
470 IF Y=8THENGOSUB1200
475 GOSUB1100:POKEV+21,0:Y=0:GOTO230
480 IFPEEK(828)>0THEN700
481 POKE53280,06:POKE53281,06:PRINT"[147][158]";CHR$(14)
485 PRINT"[211]HALOM, [198]RIENDS!"
490 PRINT"  [201] WROTE THIS PROGRAM IN HONOR OF ALL"
495 PRINT"MY [202]EWISH FRIENDS ON [209]-[204]INK."
500 PRINT"  [193]S YOU CELEBRATE THE [198]ESTIVAL OF THE"
505 PRINT"[204]IGHTS, MAY LOVE AND FAITH BE REKINDLED"
510 PRINT"AND MAY PEACE BE REALIZED WITHIN YOUR"
515 PRINT"HOME, WITHIN YOUR HEART, AND THROUGHOUT"
520 PRINT"THE WORLD!"
525 PRINT"  [212]O LIGHT THE CANDLES, PRESS THE NUM-"
530 PRINT"BERS 1 THROUGH 8 IN THE APPROPRIATE"
535 PRINT"ORDER. [212]O BLOW THEM OUT, PRESS 0..."
540 PRINT"                [198]ROM [217]OUR [198]RIENDLY,"
545 PRINT"                [206]EIGHBORHOOD [194][197][196]EVIL"
550 PRINT"                (ALIAS [196]ALE [215]ARD)"
555 PRINT"[212]HIS PROGRAM WAS REVISED WITH [211][201][196] MUSIC"
560 PRINT"AND FLAME SPRITES ADDED BY [203]EN [194]ARSKY."
561 PRINT"[204]IGHTS WILL EXTINGUISH IN 30 SECONDS."
562 PRINT"[201]F YOU WANT LONGER FIX LINE 1115
565 [129]DELAY[178]1[164]3000:[130]
566 [139][194](828)[177]0[167]700
567 [151]828,1
568 [151]214,23:[153]:[153][163]08)"(null)RESS (null)EY TO LENONTINUE";
569 [151]198,0:[146]198,1:[161]Z$:[151]214,23:[153]:[153][163]8)"                      ";
700 V[178]53248:[151]53280,0
720 [143] SPRITES
725 [129] PO[178]192 [164] 194
730 [151] P,PO
735 [129] SD[178]0[164]62
740 [135] R
745 [151] PO[172]64[170]SD,R
750 [130]:P[178]P[170]1:[130]
755 [151]V[170]39,7:[151]V[170]40,7:[151]V[170]41,7:[151]V[170]42,7
760 [151]V[170]43,7:[151]V[170]44,7:[151]V[170]45,7:[151]V[170]46,7
765 [143] POKEV+23,255:REM POKEV+29,255:REM EXPAND ALL
785 P[178]192:[151]V,176:[151]V[170]2,16:[151]V[170]4,248:[151]V[170]6,224:[151]V[170]16,2
790 [151]V[170]8,200:[151]V[170]10,151:[151]V[170]12,128:[151]V[170]14,104
795 [151]V[170]1,69:[151]V[170]3,101:[151]V[170]5,93:[151]V[170]7,85
800 [151]V[170]9,77:[151]V[170]11,77:[151]V[170]13,85:[151]V[170]15,93:[151]V[170]21,0:
801 P[178]192
804 [143]   P=P+1:IFP=195THENP=192
805 [129] PO[178]2040[164]2047:[151] PO,P:[130]
806 [129] DELAY[178]1[164]100:[130]:[142]
810 [143]  804
869 [143] DATA FOR FLAME 1 SPRITE.
870 [131]0,0,0,0,8,0,0,24,0
880 [131]0,28,0,0,28,0,0,28,0
890 [131]0,62,0,0,62,0,0,63,0
900 [131]0,119,128,0,99,128,0,193,192
910 [131]0,193,192,1,193,192,1,129,128
920 [131]1,131,128,0,199,0,0,124,0
930 [131]0,0,0,0,0,0,0,0,0
939 [143]  DATA FOR FLAME 2 SPRITE.
940 [131]0,0,0,0,8,0,0,24,0
950 [131]0,48,0,0,56,0,0,120,0
960 [131]0,124,0,0,124,0,0,254,0
970 [131]0,254,0,0,239,0,1,199,0
980 [131]1,131,128,1,131,128,1,131,128
990 [131]1,131,128,0,199,0,0,124,0
1000 [131]0,0,0,0,0,0,0,0,0
1009 [143]     DATA FOR FLAME 3 SPRITE.
1010 [131]0,0,0,0,24,0,0,48,0
1020 [131]0,48,0,0,112,0,0,112,0
1030 [131]0,248,0,0,248,0,0,252,0
1040 [131]1,220,0,3,206,0,3,135,0
1050 [131]3,131,0,3,131,128,3,131,128
1060 [131]1,195,128,0,199,0,0,124,0
1070 [131]0,0,0,0,0,0,0,0,0
1100 TI$[178]"000000"
1101 [151]198,0:[151]53280,0
1105 P[178]P[170]1:[139]P[178]195[167]P[178]192
1106 [139][194](198)[177]0[167]1120
1110 [129] PO[178]2040[164]2047:[151] PO,P:[130]
1114 [139] X[178]8 [167] [141]180:[137]1105
1115 [139] TI$[179]"000030"[167] 1105
1116 [143] LIGHTS WILL EXTINGUISH AFTER 30SECONDS: IF YOU WANT LONGER FIX 1115
1120 [142]
1200 [153]"";[163]132)"HAG SAMAIACH!!!SYS":[142]
10000 D[178][194](186):N$[178]"MENORAH V2":[159]15,D,15,"S0:"[170]N$:[160]15:[148]N$,D:[128]
40000 [151]53280,0:[151]53281,0:[153]"STOPLOAD"
40001 [141]145
40002 A$[178]"H":B$[178]"L(null)A$,D"[170][199](13)[170]"R(null)"[170][199](13):[151]646,0:[153]"LOAD"
40003 [129]X[178]1[164]10:[151]630[170]X,[198]([202](B$,X)):[130]:[151]198,10
40004 [151]53265,11
40005 [158]65534